home *** CD-ROM | disk | FTP | other *** search
/ Chip Hitware 7 B / CHIP_HITWARE_7B.iso / Edukacja / Guitar Tuner / Tuner32.exe / Tuner32.dxr / 00001.ls next >
Encoding:
Text File  |  1996-10-21  |  364 b   |  12 lines

  1. on exitFrame
  2.   set the windowType of window "Wintun16" to 2
  3.   set runTop to the stageTop + 0
  4.   set runLeft to the stageLeft + 0
  5.   set runRight to the stageLeft + 304
  6.   set runBot to the stageTop + 156
  7.   set the rect of window "Wintun16" to rect(runLeft, runTop, runRight, runBot)
  8.   open(window "Wintun16")
  9.   set the visible of window "Wintun16" to 1
  10.   pause()
  11. end
  12.